home *** CD-ROM | disk | FTP | other *** search
/ Xenosoft 2 / Xenosoft 2 (Game collection)(1994).iso / bioforge / script / el_scene.scp < prev    next >
Text File  |  1994-11-25  |  8KB  |  392 lines
  1. // SET SCENE WITH ALIEN ELITE
  2.  
  3. { ELITEGREETING
  4.  
  5.     @Çì      BLINK_ELITE_MONITOR
  6.     @Ç¢              ( PLAYER )
  7.     A  OFF
  8.     £    0 GRADUAL
  9.     M      WALK CONTINUE
  10.     @Ç¢              ( ELITE )
  11.     M      STAND CONTINUE
  12.     W    1 SECOND
  13.     @Ç¢              ( PLAYER )
  14.     M      STAND CONTINUE
  15.     W    1 SECOND
  16.  
  17.     C      PLT1
  18.     @Ç¢              ( ELITE )
  19.     £    270 GRADUAL
  20.     W    2 SECONDS
  21.  
  22.     C      PLT3
  23.     @Ç¢              ( ELITE )
  24.     W    1 SECOND
  25.     M      USE_PANEL
  26.     W    1 SECOND
  27.     
  28.     ▒         "plt0"
  29.     //STARTFLIC "plt0-x" // IMPROVED FLIC - IF WE HAVE TIME - JT
  30.     ╖           1
  31.     ▓      USERINTERRUPT PASSFLIC
  32.  
  33.     ^äÄ         =     0
  34.                 @üï      CITYON 0 ^äÄ        
  35.     //SUSPENDWHILE @RUNFLIC CITYONJT 0 _PLT0_FRAME
  36.     
  37.     :PASSFLIC
  38.  
  39.     │       
  40.     O     $ÇÇ        
  41.     O     $Çá     
  42.     d            
  43.  
  44.     C      PLT6
  45.     ƒ                  PLT1 OFF
  46.     ƒ                  PLT2 OFF
  47.     ƒ                  PLT3 OFF
  48.     ƒ                  PLT4 ON
  49.     ƒ                  PLT5 ON
  50.     ƒ                  PLT6 ON
  51.     ^çô              = $Ç╝  
  52.     ^âæ              = $Ç╝  
  53.     @Çì      ACTIVATE_ELITE
  54.     W    3 SECONDS
  55.  
  56.     C      PLT5
  57.     C      UNLOCK
  58.     @Ç¢              ( PLAYER )
  59.     A  ON
  60.  
  61. }
  62.  
  63. [ CITYONJT
  64.     
  65.     00:00 O     $ÇÆ  
  66.           ^äÄ         =     0
  67.     00:15 ^äÄ         =     1
  68.     01:00 ^äÄ         =     2
  69.     01:15 ^äÄ         =     3
  70.     02:00 ^äÄ         =     4
  71.     02:15 ^äÄ         =     5
  72.     03:00 ^äÄ         =     6
  73.     03:15 ^äÄ         =     7
  74.     04:00 ^äÄ         =     8
  75.     04:15 ^äÄ         =     9
  76.     05:00 ^äÄ         =     10
  77.     05:15 ^äÄ         =     11
  78.     06:00 ^äÄ         =     12
  79.     06:15 ^äÄ         =     13
  80.     07:00 ^äÄ         =     14
  81.     07:15 ^äÄ         =     15
  82.     08:00 ^äÄ         =     16
  83.     08:15 ^äÄ         =     17
  84.     09:00 ^äÄ         =     18
  85.     09:15 ^äÄ         =     19
  86.     10:00 ^äÄ         =     20
  87.     10:10 ^äÄ         =     21
  88.     10:20 ^äÄ         =     22
  89.     11:00 ^äÄ         =     23
  90.     11:10 ^äÄ         =     24  
  91.     12:10 ^äÄ         =     25
  92.     13:00 ^äÄ         =     26  
  93.     13:15 ^äÄ         =     27
  94.     14:00 ^äÄ         =     28  
  95.     14:05 ^äÄ         =     29
  96.     14:10 ^äÄ         =     30  
  97.     14:20 ^äÄ         =     31  
  98.     15:00 ^äÄ         =     32  
  99.     15:10 ^äÄ         =     33  
  100.     15:20 ^äÄ         =     34  
  101.     16:00 ^äÄ         =     35  
  102.     16:10 ^äÄ         =     36  
  103.     16:20 ^äÄ         =     37  
  104.     17:00 ^äÄ         =     38  
  105.     17:10 ^äÄ         =     39  
  106.     17:20 ^äÄ         =     40 
  107.     18:00 ^äÄ         =     41  
  108.     18:10 ^äÄ         =     42  
  109.     18:20 ^äÄ         =     43  
  110.     19:00 ^äÄ         =     44  
  111.     19:10 ^äÄ         =     45  
  112.     19:20 ^äÄ         =     46  
  113.     20:00 ^äÄ         =     47  
  114.     20:10 ^äÄ         =     48  
  115.     20:20 ^äÄ         =     49  
  116.     21:00 ^äÄ         =     50  
  117.     22:10 ^äÄ         =     51  
  118.     22:20 ^äÄ         =     52 
  119.     23:00 ^äÄ         =     53  
  120.     23:10 ^äÄ         =     54  
  121.     23:19 ^äÄ         =     55  
  122.           @Çå   (`åò        )
  123.     23:21 ^äÄ         =     56 
  124.     23:23 ^äÄ         =     57
  125.     23:25 ^äÄ         =     58
  126.     23:27 ^äÄ         =     59
  127.     24:00 ^äÄ         =     60
  128.     24:05 ^äÄ         =     61 
  129.           ^è½          =    @Çç     (`ü╡     )
  130.     26:05 ^äÄ         =     62 
  131.  
  132.  
  133. :OUT
  134. ]
  135.  
  136. [ CITYON
  137.     
  138.     00:00 O     $ÇÆ  
  139.         @Çå   (`üƒ      )
  140.           ^äÄ         =     0
  141.     01:00 ^äÄ         =     1
  142.         @Çå   (`üƒ      )
  143.     02:00 ^äÄ         =     2
  144.         @Çå   (`üƒ      )
  145.     03:00 ^äÄ         =     3
  146.         @Çå   (`üƒ      , 200)
  147.     04:00 ^äÄ         =     4
  148.         @Çå   (`üƒ      , 200)
  149.     05:00 ^äÄ         =     5
  150.         @Çå   (`üƒ      , 200)
  151.     06:00 ^äÄ         =     6
  152.         @Çå   (`üƒ      , 175)
  153.     07:00 ^äÄ         =     7
  154.         @Çå   (`üƒ      , 175)
  155.     08:00 ^äÄ         =     8
  156.         @Çå   (`üƒ      , 175)
  157.     09:00 ^äÄ         =     9
  158.         @Çå   (`üƒ      , 150)
  159.     10:00 ^äÄ         =     10
  160.         @Çå   (`üƒ      , 140)
  161.     10:20 ^äÄ         =     11
  162.         @Çå   (`üƒ      , 140)
  163.     11:10 ^äÄ         =     12  
  164.         @Çå   (`üƒ      , 130)
  165.     13:00 ^äÄ         =     13  
  166.         @Çå   (`üƒ      , 130)
  167.     14:00 ^äÄ         =     14  
  168.         @Çå   (`üƒ      , 130)
  169.     14:10 ^äÄ         =     15  
  170.     14:20 ^äÄ         =     16  
  171.     15:00 ^äÄ         =     17  
  172.         @Çå   (`üƒ      , 100)       
  173.     15:10 ^äÄ         =     18  
  174.     15:20 ^äÄ         =     19  
  175.     16:00 ^äÄ         =     20  
  176.         @Çå   (`üƒ      , 100)
  177.     16:10 ^äÄ         =     21  
  178.     16:20 ^äÄ         =     22  
  179.     17:00 ^äÄ         =     23  
  180.     17:10 ^äÄ         =     24  
  181.     17:20 ^äÄ         =     25 
  182.     18:00 ^äÄ         =     26  
  183.     18:10 ^äÄ         =     27  
  184.     18:20 ^äÄ         =     28  
  185.     19:00 ^äÄ         =     29  
  186.     19:10 ^äÄ         =     30  
  187.     19:20 ^äÄ         =     31  
  188.     20:00 ^äÄ         =     32  
  189.     20:10 ^äÄ         =     33  
  190.     20:20 ^äÄ         =     34  
  191.     21:00 ^äÄ         =     35  
  192.     22:10 ^äÄ         =     36  
  193.     22:20 ^äÄ         =     37
  194.     23:00 ^äÄ         =     38  
  195.     23:10 ^äÄ         =     39  
  196.     23:19 ^äÄ         =     40  
  197.           @Çå   (`åò        )
  198.     23:21 ^äÄ         =     41 
  199.     23:23 ^äÄ         =     42
  200.     23:25 ^äÄ         =     43
  201.     23:27 ^äÄ         =     44
  202.     24:00 ^äÄ         =     45
  203.     24:05 ^äÄ         =     46 
  204.           ^è½          =    @Çç     (`ü╡     )
  205. :OUT
  206. ]
  207.  
  208. { BLINK_ELITE_MONITOR
  209.     ó               PLT6
  210.  
  211.     :LOOP
  212.     â      
  213.     I  ^äÅ        < 7 THEN
  214.         {
  215.         ^äÅ        ++
  216.         }
  217.     E   
  218.         {
  219.         ^äÅ        = 1
  220.         }
  221.     J    #Çç 
  222.     
  223. }
  224.  
  225. [ STREET_LIGHT
  226.  
  227.     ó               PLT1 PLT2 PLT4 PLT5 
  228.     :LOOP
  229.  
  230.     00:05   I  ^äæ        < 30 THEN
  231.                 {
  232.                 ^äæ        ++
  233.                 }
  234.             E   
  235.                 {
  236.                 ^äæ        = 1
  237.                 }
  238.             ò            
  239.             J    #Çë 
  240. ]
  241.  
  242. [ CORONA
  243.     ó               PLT4 PLT5 
  244.     
  245.     :LOOP
  246.     â      
  247.     00:01   I  ^äÉ         < 6 THEN
  248.                 {
  249.                 ^äÉ         ++
  250.                 }
  251.             E   
  252.                 {
  253.                 ^äÉ         = 1
  254.                 }
  255.             ò            
  256.             J    #Çï 
  257. ]
  258.  
  259. { BRINGONTHEALIEN
  260.     P        ~ÇÇ     
  261.  
  262.         @Ç¢              ( PLAYER )
  263.         A  OFF
  264.         ^Ç│    ++
  265.         C      PLT3
  266.  
  267.         // WAIT A GAME TURN SO THAT WE CAN CLEAR OUR THE CITYMON_USE'S
  268.         //   MOTION STAND STUFF
  269.         â      
  270.         â      
  271.  
  272.         £    0 GRADUAL
  273.         M      STAND CONTINUE
  274.         W    1 SECOND
  275.     
  276.         ▒         "plt0"
  277.         ╖           1
  278.         ▓      USERINTERRUPT PASSFLIC
  279.     
  280.         ^äÄ         =     0
  281.                     @üï      CITYON 0 ^äÄ        
  282.         ^çô              = $Ç╝  
  283.         ^âæ              = $Ç╝  
  284.  
  285.         :PASSFLIC
  286.     
  287.         │       
  288.         @Çì      BLINK_ELITE_MONITOR        
  289. //              @PROCESS STREET_LIGHT           ALWAYS ON -- BAR
  290.         @Çì      CORONA
  291.         
  292.         C      PLT6
  293.         ƒ                  PLT1 OFF
  294.         ƒ                  PLT2 OFF
  295.         ƒ                  PLT3 OFF
  296.         ƒ                  PLT4 ON
  297.         ƒ                  PLT5 ON
  298.         ƒ                  PLT6 ON
  299.         ^çô              = $Ç╝  
  300.         ^âæ              = $Ç╝  
  301.  
  302.         C      PLT4
  303.  
  304.         // SHIP POPS UP
  305.         ~ÇÇ      = @Çè               (^äÆ        , 1, 0, 68, 5)
  306.         ^êæ             = @Çç     (`èö         , 0)
  307.         @Çî                  (^êæ            , 0, 255, 90)
  308.         @Çï                 (^êæ            , 5000, 15000, 90)
  309.  
  310.         :PATIENTLYWAITING
  311.  
  312.         I  @Çó            (~ÇÇ     ) THEN
  313.         {
  314.             W    10
  315.             J    #ÇÄ             
  316.         }
  317.     
  318.         ^äö                     = @Çì      SHIP_HOVER
  319.  
  320.         @Ç¢              ( ELITE )
  321.         ï           PLAYER
  322.         Y                 PLT4, PLT5, PLT6
  323.         Z       CURFIG OFF
  324.         u          CURFIG OFF
  325.         A  OFF
  326.         G  PELITE
  327.         G  FELITE RUN
  328.         u          CURFIG ON
  329.         A  ON
  330.  
  331.         @Çì      ACTIVATE_ELITE
  332.  
  333.         C      UNLOCK
  334.         @Ç¢              ( PLAYER )
  335.         A  ON
  336.         ^Ç│    --
  337.  
  338.         W    5 SECONDS
  339.         i           LEX LITCITY
  340. }
  341.  
  342. [ SHIP_HOVER
  343.  
  344.     P        ~ÇÇ        = 0
  345.  
  346.     ó               PLT4
  347.  
  348.     @Çî                  (^êæ            , 255, 125, 90)
  349.     @Çï                 (^êæ            , 15000, 11025, 90)
  350.  
  351. :TOP
  352.  
  353. 00:08   I  ~ÇÇ        = 0 THEN
  354.         {
  355.             I  ^äÆ         < 118 THEN
  356.             {
  357.                 ^äÆ         ++
  358.                 ò            
  359.                 J    #ÇÉ
  360.             }
  361.         }
  362.         E   
  363.         {
  364.             I  ^äÆ         > 68 THEN
  365.             {
  366.                 ^äÆ         --
  367.                 ò            
  368.                 J    #ÇÉ
  369.             }
  370.         }
  371. 00:12   I  ~ÇÇ        = 0 THEN
  372.             ~ÇÇ        = 1
  373.         E   
  374.             ~ÇÇ        = 0
  375.         J    #ÇÉ
  376.  
  377. ]
  378.  
  379. [ SHIP_CLIMB
  380.  
  381.     :BACK
  382.  
  383.     00:04   I  ^äÆ         != 119 THEN
  384.             {
  385.             ^äÆ         ++
  386.             ò            
  387.             J    #ÇÆ 
  388.             }
  389. ]
  390.  
  391. //$ 26 - version number
  392.